#include <bits/stdc++.h>
using namespace std;

char a[3005][3005];
int b[3005][3005]; // b[i][j]表示第i行第j列右边有几个B（含本身）
int c[3005][3005]; // c[i][j]表示第i行第j列下边有几个C（含本身）
long long ans = 0;
int main() {
  int n, m;
  cin >> n >> m;
  for (int i = 1; i <= n; i++) { // 输入
    for (int j = 1; j <= m; j++) {
      cin >> a[i][j];
    }
  }
  for (int i = 1; i <= n; i++) {
    for (int j = m; j >= 1; j--) { // 预处理B数组
      b[i][j] = b[i][j + 1];
      if (a[i][j] == 'B') {
        b[i][j]++;
      }
    }
  }
  for (int i = 1; i <= m; i++) { // 预处理C数组
    for (int j = n; j >= 1; j--) {
      c[j][i] = c[j + 1][i];
      if (a[j][i] == 'C') {
        c[j][i]++;
      }
    }
  }
  for (int i = 1; i < n; i++) { // 枚举每个A
    for (int j = 1; j < m; j++) {
      if (a[i][j] == 'A') {
        ans += 1ll * b[i][j + 1] * c[i + 1][j]; // 计算注意结果有可能超过int范围
      }
    }
  }
  cout << ans;
  return 0;
}
